IF exists(SELECT * FROM dbo.sysobjects WHERE name='WEB_dossier' AND xtype='P') 
BEGIN
	DROP PROCEDURE WEB_dossier
END
GO

CREATE      procedure WEB_dossier
  (@logon varchar(50), @iNr varchar(7))
As
set nocount on

-------------------------------------------------
-- Header en footer
-------------------------------------------------
create table #hulptabel(hoofdNr int, volgNr int,tekst varchar(8000))

insert into #hulptabel(hoofdNr,volgNr,tekst)
values (0,0,'<?xml version="1.0"  encoding="ISO-8859-1" ?>') 

insert into #hulptabel(hoofdNr,volgNr,tekst)
values (0,1,'<dossier iNr="' + @iNr + '">') 

insert into #hulptabel(hoofdNr,volgNr,tekst)
select 0,2,'<naam>' + isNull(voornaam,'') + ' ' + isNull(achternaam,'') 
	+ ' ' + isNull(klas,'') + '</naam>'
	from leerlingen..leerlingen 
	where inschrijvingsNr = @iNr 

insert into #hulptabel(hoofdNr,volgNr,tekst)
values (999,0,'</dossier>')

-------------------------------------------------
-- Publieke gegevens
-------------------------------------------------

insert into #hulptabel(hoofdNr,volgNr,tekst)
select 1,0,case when len(leerlingen.dbo.WEB_XML(publiekBericht)) > 0 then 
		'<publiek>' + leerlingen.dbo.WEB_XML(publiekBericht) + '</publiek>'
		end
	from leerlingen.dbo.noodbericht
	where inschrijvingsNr = @iNr

-------------------------------------------------
-- Controle op leesrechten
-------------------------------------------------

IF not(dbo.sec_magDossierZien(@logon,@iNr)=1)
  BEGIN
    insert into #hulptabel(hoofdNr,volgNr,tekst)
    select 1,0,'<status>De leraars die deze leerling begeleiden, hebben verder inzage in het dossier. '  +
	' Als jij ten onrechte uitgesloten bent van deze mogelijkheid, kan je contact opnemen ' +
	' met de pedagogisch directeur.' +
	'</status>'
  END
ELSE
  BEGIN
	-------------------------------------------------
	-- persoonlijkeGegevens: het hoofdNr is 3
	-------------------------------------------------
    insert into #hulptabel
    execute WEB_dossierPersoonlijkeGegevens 3,@iNr
	-------------------------------------------------
	-- Gegevens contracten: het hoofdNr is 4
	-------------------------------------------------
    insert into #hulptabel
    execute WEB_dossierContracten 4,@iNr
	-------------------------------------------------
	--  Gegevens instaptoets, leestest en spellingstest: 
	--  het hoofdNr is 5, 6 en 7
	-------------------------------------------------
    insert into #hulptabel
    execute WEB_dossierInstaptoets 5,@iNr
    insert into #hulptabel
    execute WEB_dossierLeestest 6,@iNr
    insert into #hulptabel
    execute WEB_dossierSpellingstoets 7,@iNr
	-------------------------------------------------
	-- Gegevens dubbeltekst
	-------------------------------------------------
    insert into #hulptabel
    execute WEB_dossierDubbeltekst 8,@iNr
  END

select * from #hulptabel
  order by hoofdNr,volgNr